(finder-compile-keywords): Don't process file names that start with `.'.

diff --git a/lisp/finder.el b/lisp/finder.el
index 915d88f34b92d96382d339d19b36633eed84553b..57f5d331b0e32c32fd7507f64276c7bedcafd6dd 100644 (file)
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -117,7 +117,7 @@ arguments compiles from `load-path'."
        (lambda (d)
         (mapcar
          (lambda (f) 
-           (if (and (string-match "^[^=].*\\.el$" f)
+           (if (and (string-match "^[^=.].*\\.el$" f)
                     (not (member f processed)))
                (let (summary keystart keywords)
                  (setq processed (cons f processed))